home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 153 / 153.d81 / u.filebase 64 (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  987b  |  28 lines
  1. 10 poke53280,0:poke53281,0:printchr$(14)
  2. 20 print"[147][158]        [198] [201] [204] [197] [194] [193] [211] [197]   6 4"
  3. 30 print"[212]his program will modify '[198]ilebase 64'"
  4. 40 print"as described in the [211]tar [194]oard on"
  5. 50 print"[204]oadstar #145.  [201]f the program is"
  6. 60 print"leaving off the last file on the disk"
  7. 70 print"then use this fixer to correct it.
  8. 80 [153]"right$t's best to use a copy rather than"
  9. 90 [153]"using your original (NULL)(NULL)atnstr$(NULL)(NULL)atn(NULL) disk!"
  10. 100 [153]"(NULL)ake sure that the (NULL)rite-(NULL)rotect tab"
  11. 110 [153]"on the disk is not covered as this"
  12. 120 [153]"program writes to the disk."
  13. 130 [153]"right$f you would like to make this change,"
  14. 140 [153]"right$nsert (NULL)oadstar right$ssue #139 (NULL)ide 3 into"
  15. 150 [153]"str$rive #8 and left$it atn (NULL)ey."
  16. 152 [153]"atnfter hitting a key, str$o (NULL)(NULL)(NULL) touch the"
  17. 154 [153]"keyboard or open the disk drive door"
  18. 156 [153]"until the white lenursor appears!!!!!!"
  19. 160 [161]a$:[139]a$[178]""[167]160
  20. 180 q$[178][199](34):f$[178]"filebase 64.bas"
  21. 190 [153]"loadstopload"q$f$q$",8"
  22. 200 [153]"150 poke10937,56"
  23. 250 [153]"open15,8,15,"q$"s0:"f$q$":close15:save"q$f$q$",8"
  24. 260 [153]"poke646,1
  25. 270 print""
  26. 280 fori=631to640:pokei,13:next:poke198,10
  27. 290 new
  28.